let print = false

let _ =
  let lexbuf = Lexing.from_channel stdin in
  let compilationUnit = Parser.compilationUnit Scanner.token lexbuf in
  if print then
    let listing = Printer.string_of_compilationUnit compilationUnit in
    print_string listing
  else
  ignore (Interpreter.run compilationUnit)
